﻿Imports Microsoft.VisualBasic
Imports System.Data

Public Class clsPresentacion
    Inherits clsDatos

    Function Get_Presentacion(ByVal strTipoEmpaque As String) As DataTable

        'Return GetDatos("select * from artcatPresentacion order by presentacion")
        Return GetDatos("select distinct UPPER(Presentacion) Presentacion from art where TipoEmpaque='" & strTipoEmpaque & "' order by presentacion")

    End Function

    Function Get_Presentacion(ByVal strTipoEmpaque As String, ByVal strPresentacion As String) As DataTable

        'Return GetDatos("Select * from artcatPresentacion where presentacion like '" & strPresentacion & "'")
        Return GetDatos("Select distinct UPPER(Presentacion) Presentacion from art where TipoEmpaque='" & strTipoEmpaque & "' and presentacion like '" & strPresentacion & "'")

    End Function
End Class
